ListBox (wfxListBox)

Properties

Methods

Events

Items Collection (wfxListBoxItemsCollection)

Item (wfxListBoxItem)

Working with a ListBox

Adding items (Text and 32-bit user defined value)

nIndex = Form1.ListBox1.Items.Add("First item in ListBox”, 12345)

Adding items (Text only)

nIndex = Form1.ListBox1.Items.Add("Second item in ListBox”)

Deleting an Item (the selected item)

Form1.ListBox1.Items.Remove(Form1.ListBox1.SelectedIndex)

Deleting an Item (based on index)

Form1.ListBox1.Items.Remove(0)  ‘ removes the first listbox item

Remove all Items from the ListBox

Form1.ListBox1.Items.Clear

Iterate all items in ListBox

For i as long = 0 to Form1.ListBox1.Items.Count – 1
   ? Form1.ListBox1.Item(i).Text, Form1.ListBox1.Item(i).Data32
Next

Iterate all selected items in the ListBox

' Determine the type of listbox selection method and then display items
select case Form1.ListBox1.SelectionMode
   case ListSelectionMode.None
      ' Obviously nothing in the list can be selected

   case ListSelectionMode.One
      ' Show the selected item (single select listbox)
      ? "Method #1: "; Form1.ListBox1.Item(Form1.ListBox1.SelectedIndex).Text, _
Form1.ListBox1.Item(Form1.ListBox1.SelectedIndex).Data32
      
      ' Alternate approach, show the selected item (single select listbox)
      ? "Method #2: "; Form1.ListBox1.SelectedItem.Text, _
                       Form1.ListBox1.SelectedItem.Data32

   Case ListSelectionMode.MultiSimple, ListSelectionMode.MultiExtended
      ' Show the selected items (multiselect listbox). Must iterate
      ' through the list and test if entry is selected.
      ? "Count: "; Form1.ListBox1.Items.Count
      ? "SelectedCount: "; Form1.ListBox1.Items.SelectedCount
      for i as long = 0 to Form1.ListBox1.Items.Count - 1  '<- Count not SelectedCount
         if Form1.ListBox1.Item(i).Selected then
            ? Form1.ListBox1.Item(i).Text, Form1.ListBox1.Item(i).Data32
         end if   
      next
End Select

ControlBorderStyle

Enum ControlBorderStyle
   None = 1
   FixedSingle  
   Fixed3D 
End Enum

ListSelectionMode

Enum ListSelectionMode
   None = 1
   One
   MultiSimple
   MultiExtended
END ENUM

wfxSize

Type wfxSize
   private:
      _Width  as Long
      _Height as long 

   public:
      Declare Property Width() As Long
      Declare Property Width( ByVal nValue As Long )
      Declare Property Height() As Long
      Declare Property Height( ByVal nValue As Long )
      Declare Function IsEmpty() as Boolean
      Declare Constructor ( byval nWidth as long = 0, byval nHeight as long = 0)
End Type

wfxPoint

Type wfxPoint
   private:
      _x as Long
      _y as long 

   public:
      Declare Property x() As Long
      Declare Property x( ByVal nValue As Long )
      Declare Property y() As Long
      Declare Property y( ByVal nValue As Long )
      Declare Function IsEmpty() as Boolean
      Declare Constructor ( byval xPos as long = 0, byval yPos as long = 0)
End Type